function [SkinIndexRow,SkinIndexCol]=skin_range(Irgb)
Irgb=double(Irgb);

%Converting into YCbCr
Iycbcr=rgb2ycbcr(Irgb);
cr=Iycbcr(:,:,3);

[SkinIndexRow,SkinIndexCol]= find(10<cr & cr<45);